Using texPreview to create Carousel in Rmarkdown

Jonathan Sidi

2018-10-26

library(texPreview)
library(slickR)

tex_opts$set(
  returnType = 'html',
  imgFormat='svg'
  )

Kable Input

texPreview::texPreview( obj = knitr::kable(mtcars,'latex'),stem='table1')

TeX Input

tab='
\\begin{tabular}{llr}
\\hline
\\multicolumn{2}{c}{Item} \\\\
\\cline{1-2}
Animal    & Description & Price (\\$) \\\\
\\hline
Gnat      & per gram    & 13.65      \\\\
          & each        & 0.01       \\\\
Gnu       & stuffed     & 92.50      \\\\
Emu       & stuffed     & 33.33      \\\\
Armadillo & frozen      & 8.99       \\\\
\\hline
\\end{tabular}'

texPreview(obj = tab,stem = 'table2')

Carousel slickR htmlwidget

slickR::slickR(obj = list.files(outdir,full.names = TRUE,pattern = 'svg'),width = '100%')